10 POKE 53280,5: POKE 53281,11 20 PRINT"[147][155] TECHNO":PRINT" INFO" 30 PRINT,"[145][145][145][145][158] [172][187] [162][172][162][162][187][162] [162][162] [172][162][187][172][187] [162][172][162][162][187]",, 40 PRINT" [161][146][161]  [161][146][161]  [146] [161][146][161][188][190] [146]  [161] [190] [161][146][161]",, 50 PRINT" [161][188][188] [161][172][162][146]  [146] [161][146][161]  [146]  [161][146][161][190] [161][172][162][146]", 60 PRINT" [161][172][146][188] [161][188][146][162][187] [146][162][162][188][188][190][146][190][187][146][162][172][161][146][161]  [161][188][146][162][187]" 70 PRINT" JASON FINCH PROUDLY PRESENTS THE" 80 PRINT" SECOND TECHNO-INFO CHALLENGE!" 90 PRINT#"[153] FOR DETAILS OF YOUR TASK, PLEASE" 100 PRINT" READ THE MAGAZINE INSTRUCTIONS VERY[157][157][157][157][163][163][163][163]" 110 PRINT" CAREFULLY SO THAT YOU CAN BE SURE" 120 PRINT" THAT YOUR ENTRY WILL BE ACCEPTED" 130 PRINT" USE A JOYSTICK IN PORT TWO AND PRESS" 140 PRINT" THE FIRE BUTTON TO BEGIN, PERHAPS!" 150 A=127-PEEK(56321) 160 IF (A AND 16)<>1 THEN 150 170 JW=10:SC=0:L=3 180 POKE 53280,0: POKE 53281,0: PRINT "[147]"; 190 Y=0: A$="TECHNO INFO CHALLENGE 3: DEBUG IT! ": GOSUB 590 200 Y=1: A$="BY JASON FINCH - SCORE: LIVES: ": GOSUB 590 210 FOR X=0 TO 39 220 POKE 55296+120+X,10: POKE 1024+120+X,160 230 POKE 55296+960+X,10: POKE 1004+960+X,160 240 NEXT 250 FOR Y=2 TO 23 260 POKE 55296+Y*40,10: POKE 1024+Y*40,160 270 POKE 55296+Y*40+39,10: POKE 1024+Y*40+39,160 280 NEXT 290 FOR N=1 TO JW 300 GOSUB 640 310 GOSUB 700 320 GOSUB 700 330 NEXT 340 IF JW<15 THEN FOR N=1 TO 30-(JW/2): GOSUB 640: NEXT 350 X=20:P=1444:F=0 360 BX=20:BY=10:DX=1:DY=1: GOSUB 760 370 IF PEEK(1024+BY*40+BX)<>32 THEN BX=BX+1: GOTO 370 380 PRINT""TAB(X)" ### " 390 PRINT""TAB(X)" ### " 400 POKE P+54272,1: POKE P,81 410 A=127-PEEK(56320) 420 IF (A AND 4)=4 THEN X=X+1 430 IF (A AND 8)=8 THEN X=X+1 440 IF X=0 THEN X=1 450 IF X=35 THEN X=34 460 F=1-F: IF F=1 THEN 380 470 POKE P,32 480 IF BY=5 AND PEEK(P-40)<>32 THEN DY=-DY: SC=SC+3 490 IF BY=22 AND PEEK(P+40)<>32 THEN DY=-DY: SC=SC+3 500 IF BX=1 OR BX=38 THEN DX=-DX 510 IF BY=4 OR BY=23 THEN 810 520 BX=BX+DX 530 BY=BY+DX 540 P=1024+BY*40+BX 550 IF PEEK(P)=160 THEN DY=-DY: SC=SC+1: GOSUB 760: GOTO 530 560 IF PEEK(P)<>90 THEN 380 570 POKEE 1024+BY*40+BX,32 580 SC=SC+10:JW=JW-1:GOSUB760:GOTO380 590 PRINT LEFT$("",Y+1); 600 FOR X=40 TO 1 STEP -2 610 PRINT MID$(" [160]"+A$,X,39) 620 PRINT "[145]";: NEXT 630 RETURN 640 X=INT(36*RND(1))+3 650 Y=INT(18*RND(1))+1 660 P=1024+Y*40+X 670 GOSUB 770: IF R=1 THEN 640 680 POKE P+54272,14: POKE P,102 690 RETURN 700 X=INT(36*RND(1))+3 710 Y=INT(18*RND(1))+5 720 P=1024+Y*40+X 730 GOSUB 770: IF R=1 THEN 700 740 POKE P+54272,13: POKE P,90 750 RETURN 760 PRINT"";TAB(24);L;TAB(37);SC:RETURN 770 R=0: FOR X1=-1 TO 1: FOR Y1=-1 TO 1 780 IF PEEK(P+Y1*40+X1)<>32 THEN R=1 790 NEXT X1,Y1 800 RETURN 810 PRINT""TAB(X)" " 820 PRINT""TAB(X)" " 830 PRINT"YOU'RE SUPPOSED TO HIT THE BALL, MATE!" 840 IF L=1 THEN 890 850 PRINT"GET READY TO CONTINUE - PRESS FIRE" 860 A=127-PEEK(56320) 870 IF (A AND 16)<>16 THEN 860 880 K=L-1: GOTO 180 890 PRINT"YOUR GAME'S UP!!! - PRESS FIRE" 900 PRINT"INCIDENTALLY, I DON'T THINK MUCH" 910 PRINT"TO YOUR RATHER LOW SCORE" 920 A=127-PEEK(56320) 930 IF (A AND 16)<>16 THEN 930 940 RUN